home *** CD-ROM | disk | FTP | other *** search
/ Linux Cubed Series 3: Developer Tools / Linux Cubed Series 3 - Developer Tools.iso / devel / lang / lisp / stk-3.002 / stk-3 / STk-3.1 / Doc / Reference / Appendix-C.tex / node12_ct.html < prev    next >
LaTeX Document  |  1996-01-21  |  3.6 KB

open in: MacOS 8.1     |     Win98     |     DOS

view JSON data     |     view as text

This file was processed as: LaTeX Document (document/latex).

You can browse this item here: node12_ct.html

ConfidenceProgramDetectionMatch TypeSupport
100% dexvert LaTeX Document (document/latex) magic Supported
90% dexvert Hypertext Markup Language File (text/html) magic Supported
1% dexvert Text File (text/txt) fallback Supported
100% file HTML document text default (weak)
99% file LaTeX document text default
98% file exported SGML document text default
97% file exported SGML document, ASCII text default
80% TrID HyperText Markup Language with DOCTYPE default
19% TrID HyperText Markup Language default
100% checkBytes Printable ASCII default
100% perlTextCheck Likely Text (Perl) default
100% siegfried fmt/281 LaTeX (Subdocument) default
100% gt2 HTML (Hyper Text Markup Language) Datei default
100% detectItEasy Format: plain text[LF] default (weak)
100% xdgMime text/html default



hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 3c 21 44 4f 43 54 59 50 | 45 20 48 54 4d 4c 20 50 |<!DOCTYP|E HTML P|
|00000010| 55 42 4c 49 43 20 22 2d | 2f 2f 57 33 43 2f 2f 44 |UBLIC "-|//W3C//D|
|00000020| 54 44 20 48 54 4d 4c 20 | 33 2e 32 20 46 69 6e 61 |TD HTML |3.2 Fina|
|00000030| 6c 2f 2f 65 6e 22 3e 0a | 0a 3c 21 2d 2d 43 6f 6e |l//en">.|.<!--Con|
|00000040| 76 65 72 74 65 64 20 77 | 69 74 68 20 4c 61 54 65 |verted w|ith LaTe|
|00000050| 58 32 48 54 4d 4c 20 32 | 30 32 32 20 28 52 65 6c |X2HTML 2|022 (Rel|
|00000060| 65 61 73 65 64 20 4a 61 | 6e 75 61 72 79 20 31 2c |eased Ja|nuary 1,|
|00000070| 20 32 30 32 32 29 20 2d | 2d 3e 0a 3c 48 54 4d 4c | 2022) -|->.<HTML|
|00000080| 20 6c 61 6e 67 3d 22 65 | 6e 22 3e 0a 3c 48 45 41 | lang="e|n">.<HEA|
|00000090| 44 3e 0a 3c 54 49 54 4c | 45 3e 43 6f 6e 74 65 6e |D>.<TITL|E>Conten|
|000000a0| 74 73 20 6f 66 20 45 78 | 61 6d 70 6c 65 3c 2f 54 |ts of Ex|ample</T|
|000000b0| 49 54 4c 45 3e 0a 0a 3c | 4d 45 54 41 20 48 54 54 |ITLE>..<|META HTT|
|000000c0| 50 2d 45 51 55 49 56 3d | 22 43 6f 6e 74 65 6e 74 |P-EQUIV=|"Content|
|000000d0| 2d 54 79 70 65 22 20 43 | 4f 4e 54 45 4e 54 3d 22 |-Type" C|ONTENT="|
|000000e0| 74 65 78 74 2f 68 74 6d | 6c 3b 20 63 68 61 72 73 |text/htm|l; chars|
|000000f0| 65 74 3d 75 74 66 2d 38 | 22 3e 0a 3c 4d 45 54 41 |et=utf-8|">.<META|
|00000100| 20 4e 41 4d 45 3d 22 76 | 69 65 77 70 6f 72 74 22 | NAME="v|iewport"|
|00000110| 20 43 4f 4e 54 45 4e 54 | 3d 22 77 69 64 74 68 3d | CONTENT|="width=|
|00000120| 64 65 76 69 63 65 2d 77 | 69 64 74 68 2c 20 69 6e |device-w|idth, in|
|00000130| 69 74 69 61 6c 2d 73 63 | 61 6c 65 3d 31 2e 30 22 |itial-sc|ale=1.0"|
|00000140| 3e 0a 3c 4d 45 54 41 20 | 4e 41 4d 45 3d 22 47 65 |>.<META |NAME="Ge|
|00000150| 6e 65 72 61 74 6f 72 22 | 20 43 4f 4e 54 45 4e 54 |nerator"| CONTENT|
|00000160| 3d 22 4c 61 54 65 58 32 | 48 54 4d 4c 20 76 32 30 |="LaTeX2|HTML v20|
|00000170| 32 32 22 3e 0a 0a 3c 4c | 49 4e 4b 20 52 45 4c 3d |22">..<L|INK REL=|
|00000180| 22 53 54 59 4c 45 53 48 | 45 45 54 22 20 48 52 45 |"STYLESH|EET" HRE|
|00000190| 46 3d 22 41 70 70 65 6e | 64 69 78 2d 43 2e 63 73 |F="Appen|dix-C.cs|
|000001a0| 73 22 3e 0a 0a 3c 4c 49 | 4e 4b 20 52 45 4c 3d 22 |s">..<LI|NK REL="|
|000001b0| 70 72 65 76 69 6f 75 73 | 22 20 48 52 45 46 3d 22 |previous|" HREF="|
|000001c0| 6e 6f 64 65 31 31 5f 6d | 6e 2e 68 74 6d 6c 22 3e |node11_m|n.html">|
|000001d0| 0a 3c 4c 49 4e 4b 20 52 | 45 4c 3d 22 75 70 22 20 |.<LINK R|EL="up" |
|000001e0| 48 52 45 46 3d 22 6e 6f | 64 65 39 5f 6d 6e 2e 68 |HREF="no|de9_mn.h|
|000001f0| 74 6d 6c 22 3e 0a 3c 2f | 48 45 41 44 3e 0a 20 0a |tml">.</|HEAD>. .|
|00000200| 3c 42 4f 44 59 20 62 67 | 63 6f 6c 6f 72 3d 22 23 |<BODY bg|color="#|
|00000210| 66 66 66 66 66 66 22 20 | 74 65 78 74 3d 22 23 30 |ffffff" |text="#0|
|00000220| 30 30 30 30 30 22 20 6c | 69 6e 6b 3d 22 23 39 39 |00000" l|ink="#99|
|00000230| 34 34 45 45 22 20 76 6c | 69 6e 6b 3d 22 23 30 30 |44EE" vl|ink="#00|
|00000240| 30 30 66 66 22 20 61 6c | 69 6e 6b 3d 22 23 30 30 |00ff" al|ink="#00|
|00000250| 66 66 30 30 22 3e 0a 0a | 3c 48 32 3e 3c 41 20 49 |ff00">..|<H2><A I|
|00000260| 44 3d 22 53 45 43 54 49 | 4f 4e 30 30 30 34 33 30 |D="SECTI|ON000430|
|00000270| 30 30 30 30 30 30 30 30 | 30 30 30 30 30 30 22 3e |00000000|000000">|
|00000280| 0a 45 78 61 6d 70 6c 65 | 3c 2f 41 3e 0a 3c 2f 48 |.Example|</A>.</H|
|00000290| 32 3e 20 0a 0a 3c 50 3e | 0a 49 6e 20 74 68 69 73 |2> ..<P>|.In this|
|000002a0| 20 73 65 63 74 69 6f 6e | 20 77 65 20 73 68 61 6c | section| we shal|
|000002b0| 6c 20 63 6f 6e 74 69 6e | 75 65 20 74 6f 20 64 65 |l contin|ue to de|
|000002c0| 66 69 6e 65 20 6f 70 65 | 72 61 74 69 6f 6e 73 20 |fine ope|rations |
|000002d0| 6f 6e 20 74 68 65 20 3c | 54 54 3e 26 6c 74 3b 63 |on the <|TT>&lt;c|
|000002e0| 6f 6d 70 6c 65 78 26 67 | 74 3b 3c 2f 54 54 3e 0a |omplex&g|t;</TT>.|
|000002f0| 63 6c 61 73 73 20 64 65 | 66 69 6e 65 64 20 69 6e |class de|fined in|
|00000300| 20 46 69 67 75 72 65 26 | 6e 62 73 70 3b 32 2e 20 | Figure&|nbsp;2. |
|00000310| 53 75 70 70 6f 73 65 20 | 74 68 61 74 20 77 65 20 |Suppose |that we |
|00000320| 77 61 6e 74 20 74 6f 20 | 75 73 65 20 69 74 20 74 |want to |use it t|
|00000330| 6f 20 69 6d 70 6c 65 6d | 65 6e 74 20 0a 63 6f 6d |o implem|ent .com|
|00000340| 70 6c 65 78 20 6e 75 6d | 62 65 72 73 20 63 6f 6d |plex num|bers com|
|00000350| 70 6c 65 74 65 6c 79 2e | 20 46 6f 72 20 69 6e 73 |pletely.| For ins|
|00000360| 74 61 6e 63 65 20 61 20 | 64 65 66 69 6e 69 74 69 |tance a |definiti|
|00000370| 6f 6e 20 66 6f 72 20 74 | 68 65 20 61 64 64 69 74 |on for t|he addit|
|00000380| 69 6f 6e 20 6f 66 20 0a | 74 77 6f 20 63 6f 6d 70 |ion of .|two comp|
|00000390| 6c 65 78 65 73 20 63 6f | 75 6c 64 20 62 65 0a 3c |lexes co|uld be.<|
|000003a0| 42 52 3e 0a 3c 49 4d 47 | 0a 20 20 53 54 59 4c 45 |BR>.<IMG|. STYLE|
|000003b0| 3d 22 68 65 69 67 68 74 | 3a 20 32 2e 33 38 65 78 |="height|: 2.38ex|
|000003c0| 3b 20 76 65 72 74 69 63 | 61 6c 2d 61 6c 69 67 6e |; vertic|al-align|
|000003d0| 3a 20 31 37 36 2e 32 37 | 65 78 3b 20 22 20 53 52 |: 176.27|ex; " SR|
|000003e0| 43 3d 22 69 6d 67 33 31 | 2e 70 6e 67 22 0a 20 41 |C="img31|.png". A|
|000003f0| 4c 54 3d 22 5c 62 65 67 | 69 6e 7b 73 63 68 65 6d |LT="\beg|in{schem|
|00000400| 65 7d 0a 28 64 65 66 69 | 6e 65 2d 6d 65 74 68 6f |e}.(defi|ne-metho|
|00000410| 64 20 6e 65 77 2d 2b 20 | 28 28 61 20 26 6c 74 3b |d new-+ |((a &lt;|
|00000420| 63 6f 6d 70 6c 65 78 26 | 67 74 3b 29 20 28 62 20 |complex&|gt;) (b |
|00000430| 26 6c 74 3b 63 6f 6d 70 | 6c 65 78 26 67 74 3b 29 |&lt;comp|lex&gt;)|
|00000440| 29 0a 28 6d 61 6b 65 2d | 72 65 63 74 61 6e 67 2e |).(make-|rectang.|
|00000450| 2e 2e 0a 2e 2e 2e 20 28 | 2b 20 28 72 65 61 6c 2d |...... (|+ (real-|
|00000460| 70 61 72 74 20 61 29 20 | 28 72 65 61 6c 2d 70 61 |part a) |(real-pa|
|00000470| 72 74 20 62 29 29 0a 28 | 2b 20 28 69 6d 61 67 2d |rt b)).(|+ (imag-|
|00000480| 70 61 72 74 20 61 29 20 | 28 69 6d 61 67 2d 70 61 |part a) |(imag-pa|
|00000490| 72 74 20 62 29 29 29 29 | 0a 5c 65 6e 64 7b 73 63 |rt b))))|.\end{sc|
|000004a0| 68 65 6d 65 7d 22 3e 0a | 3c 42 52 3e 0a 0a 3c 50 |heme}">.|<BR>..<P|
|000004b0| 3e 0a 54 6f 20 62 65 20 | 73 75 72 65 20 74 68 61 |>.To be |sure tha|
|000004c0| 74 20 74 68 65 20 3c 54 | 54 3e 2b 3c 2f 54 54 3e |t the <T|T>+</TT>|
|000004d0| 20 75 73 65 64 20 69 6e | 20 74 68 65 20 6d 65 74 | used in| the met|
|000004e0| 68 6f 64 20 3c 54 54 3e | 6e 65 77 2d 2b 3c 2f 54 |hod <TT>|new-+</T|
|000004f0| 54 3e 20 69 73 20 74 68 | 65 20 73 74 61 6e 64 61 |T> is th|e standa|
|00000500| 72 64 0a 61 64 64 69 74 | 69 6f 6e 20 77 65 20 63 |rd.addit|ion we c|
|00000510| 61 6e 20 64 6f 3a 0a 3c | 42 52 3e 0a 3c 49 4d 47 |an do:.<|BR>.<IMG|
|00000520| 0a 20 20 53 54 59 4c 45 | 3d 22 68 65 69 67 68 74 |. STYLE|="height|
|00000530| 3a 20 32 2e 33 38 65 78 | 3b 20 76 65 72 74 69 63 |: 2.38ex|; vertic|
|00000540| 61 6c 2d 61 6c 69 67 6e | 3a 20 31 37 36 2e 32 37 |al-align|: 176.27|
|00000550| 65 78 3b 20 22 20 53 52 | 43 3d 22 69 6d 67 33 32 |ex; " SR|C="img32|
|00000560| 2e 70 6e 67 22 0a 20 41 | 4c 54 3d 22 5c 62 65 67 |.png". A|LT="\beg|
|00000570| 69 6e 7b 73 63 68 65 6d | 65 7d 0a 28 64 65 66 69 |in{schem|e}.(defi|
|00000580| 6e 65 2d 67 65 6e 65 72 | 69 63 20 6e 65 77 2d 2b |ne-gener|ic new-+|
|00000590| 29 0a 5c 70 61 72 0a 28 | 6c 65 74 20 28 28 2b 20 |).\par.(|let ((+ |
|000005a0| 2b 29 29 0a 28 64 65 66 | 69 6e 65 2d 6d 65 74 68 |+)).(def|ine-meth|
|000005b0| 6f 64 20 6e 65 77 2d 2b | 20 28 28 2e 2e 2e 0a 2e |od new-+| ((.....|
|000005c0| 2e 2e 28 2b 20 28 72 65 | 61 6c 2d 70 61 72 74 20 |..(+ (re|al-part |
|000005d0| 61 29 20 28 72 65 61 6c | 2d 70 61 72 74 20 62 29 |a) (real|-part b)|
|000005e0| 29 0a 28 2b 20 28 69 6d | 61 67 2d 70 61 72 74 20 |).(+ (im|ag-part |
|000005f0| 61 29 20 28 69 6d 61 67 | 2d 70 61 72 74 20 62 29 |a) (imag|-part b)|
|00000600| 29 29 29 29 0a 5c 65 6e | 64 7b 73 63 68 65 6d 65 |)))).\en|d{scheme|
|00000610| 7d 22 3e 0a 3c 42 52 3e | 0a 0a 3c 50 3e 0a 54 68 |}">.<BR>|..<P>.Th|
|00000620| 65 20 3c 54 54 3e 64 65 | 66 69 6e 65 2d 67 65 6e |e <TT>de|fine-gen|
|00000630| 65 72 69 63 3c 2f 54 54 | 3e 20 65 6e 73 75 72 65 |eric</TT|> ensure|
|00000640| 73 20 68 65 72 65 20 74 | 68 61 74 20 3c 54 54 3e |s here t|hat <TT>|
|00000650| 6e 65 77 2d 2b 3c 2f 54 | 54 3e 20 77 69 6c 6c 20 |new-+</T|T> will |
|00000660| 62 65 20 64 65 66 69 6e | 65 64 20 69 6e 20 74 68 |be defin|ed in th|
|00000670| 65 20 67 6c 6f 62 61 6c | 0a 65 6e 76 69 72 6f 6e |e global|.environ|
|00000680| 6d 65 6e 74 2e 20 4f 6e | 63 65 20 74 68 69 73 20 |ment. On|ce this |
|00000690| 69 73 20 64 6f 6e 65 2c | 20 77 65 20 63 61 6e 20 |is done,| we can |
|000006a0| 61 64 64 20 6d 65 74 68 | 6f 64 73 20 74 6f 20 74 |add meth|ods to t|
|000006b0| 68 65 20 67 65 6e 65 72 | 69 63 20 66 75 6e 63 74 |he gener|ic funct|
|000006c0| 69 6f 6e 20 0a 3c 54 54 | 3e 6e 65 77 2d 2b 3c 2f |ion .<TT|>new-+</|
|000006d0| 54 54 3e 20 77 68 69 63 | 68 20 6d 61 6b 65 20 61 |TT> whic|h make a|
|000006e0| 20 63 6c 6f 73 75 72 65 | 20 6f 6e 20 74 68 65 20 | closure| on the |
|000006f0| 3c 54 54 3e 2b 3c 2f 54 | 54 3e 20 73 79 6d 62 6f |<TT>+</T|T> symbo|
|00000700| 6c 2e 0a 41 20 63 6f 6d | 70 6c 65 74 65 20 77 72 |l..A com|plete wr|
|00000710| 69 74 69 6e 67 20 6f 66 | 20 74 68 65 20 3c 54 54 |iting of| the <TT|
|00000720| 3e 6e 65 77 2d 2b 3c 2f | 54 54 3e 20 6d 65 74 68 |>new-+</|TT> meth|
|00000730| 6f 64 73 20 69 73 20 73 | 68 6f 77 6e 20 69 6e 20 |ods is s|hown in |
|00000740| 46 69 67 75 72 65 26 6e | 62 73 70 3b 33 2e 0a 0a |Figure&n|bsp;3...|
|00000750| 3c 50 3e 0a 0a 3c 44 49 | 56 20 63 6c 61 73 73 3d |<P>..<DI|V class=|
|00000760| 22 43 45 4e 54 45 52 22 | 3e 3c 41 20 49 44 3d 22 |"CENTER"|><A ID="|
|00000770| 33 32 32 22 3e 3c 2f 41 | 3e 0a 3c 54 41 42 4c 45 |322"></A|>.<TABLE|
|00000780| 3e 0a 3c 43 41 50 54 49 | 4f 4e 20 63 6c 61 73 73 |>.<CAPTI|ON class|
|00000790| 3d 22 42 4f 54 54 4f 4d | 22 3e 3c 53 54 52 4f 4e |="BOTTOM|"><STRON|
|000007a0| 47 3e 46 69 67 75 72 65 | 3a 3c 2f 53 54 52 4f 4e |G>Figure|:</STRON|
|000007b0| 47 3e 0a 3c 45 4d 3e 45 | 78 74 65 6e 64 69 6e 67 |G>.<EM>E|xtending|
|000007c0| 20 3c 2f 45 4d 3e 3c 54 | 54 3e 2b 3c 2f 54 54 3e | </EM><T|T>+</TT>|
|000007d0| 3c 45 4d 3e 20 66 6f 72 | 20 64 65 61 6c 69 6e 67 |<EM> for| dealing|
|000007e0| 20 77 69 74 68 20 63 6f | 6d 70 6c 65 78 20 6e 75 | with co|mplex nu|
|000007f0| 6d 62 65 72 73 3c 2f 45 | 4d 3e 3c 2f 43 41 50 54 |mbers</E|M></CAPT|
|00000800| 49 4f 4e 3e 0a 3c 54 52 | 3e 3c 54 44 3e 3c 49 4d |ION>.<TR|><TD><IM|
|00000810| 47 0a 20 53 54 59 4c 45 | 3d 22 22 20 53 52 43 3d |G. STYLE|="" SRC=|
|00000820| 22 69 6d 67 33 33 2e 70 | 6e 67 22 0a 20 41 4c 54 |"img33.p|ng". ALT|
|00000830| 3d 22 5c 62 65 67 69 6e | 7b 66 69 67 75 72 65 7d |="\begin|{figure}|
|00000840| 7b 5c 66 6f 6f 74 6e 6f | 74 65 73 69 7a 65 0a 5c |{\footno|tesize.\|
|00000850| 62 65 67 69 6e 7b 71 75 | 6f 74 65 7d 0a 5c 62 65 |begin{qu|ote}.\be|
|00000860| 67 69 6e 7b 71 75 6f 74 | 65 7d 0a 5c 62 65 67 69 |gin{quot|e}.\begi|
|00000870| 6e 7b 76 65 72 62 61 74 | 69 6d 7d 28 64 65 66 69 |n{verbat|im}(defi|
|00000880| 2e 2e 2e 0a 2e 2e 2e 63 | 64 72 20 61 72 67 73 29 |.......c|dr args)|
|00000890| 29 29 29 29 28 73 65 74 | 21 20 2b 20 6e 65 77 2d |))))(set|! + new-|
|000008a0| 2b 29 5c 65 6e 64 7b 76 | 65 72 62 61 74 69 6d 7d |+)\end{v|erbatim}|
|000008b0| 0a 5c 65 6e 64 7b 71 75 | 6f 74 65 7d 5c 65 6e 64 |.\end{qu|ote}\end|
|000008c0| 7b 71 75 6f 74 65 7d 7d | 0a 5c 65 6e 64 7b 66 69 |{quote}}|.\end{fi|
|000008d0| 67 75 72 65 7d 22 3e 3c | 2f 54 44 3e 3c 2f 54 52 |gure}"><|/TD></TR|
|000008e0| 3e 0a 3c 2f 54 41 42 4c | 45 3e 0a 3c 2f 44 49 56 |>.</TABL|E>.</DIV|
|000008f0| 3e 0a 0a 3c 50 3e 0a 0a | 3c 50 3e 3c 50 3e 0a 3c |>..<P>..|<P><P>.<|
|00000900| 42 52 3e 0a 57 65 20 75 | 73 65 20 68 65 72 65 20 |BR>.We u|se here |
|00000910| 74 68 65 20 66 61 63 74 | 20 74 68 61 74 20 67 65 |the fact| that ge|
|00000920| 6e 65 72 69 63 20 66 75 | 6e 63 74 69 6f 6e 20 61 |neric fu|nction a|
|00000930| 72 65 20 6e 6f 74 20 6f | 62 6c 69 67 65 64 20 74 |re not o|bliged t|
|00000940| 6f 20 68 61 76 65 20 74 | 68 65 20 73 61 6d 65 0a |o have t|he same.|
|00000950| 6e 75 6d 62 65 72 20 6f | 66 20 70 61 72 61 6d 65 |number o|f parame|
|00000960| 74 65 72 73 2c 20 63 6f | 6e 74 72 61 72 69 6c 79 |ters, co|ntrarily|
|00000970| 20 74 6f 20 43 4c 4f 53 | 2e 20 20 54 68 65 20 66 | to CLOS|. The f|
|00000980| 6f 75 72 20 66 69 72 73 | 74 20 6d 65 74 68 6f 64 |our firs|t method|
|00000990| 73 0a 69 6d 70 6c 65 6d | 65 6e 74 20 74 68 65 20 |s.implem|ent the |
|000009a0| 64 79 61 64 69 63 20 61 | 64 64 69 74 69 6f 6e 2e |dyadic a|ddition.|
|000009b0| 20 54 68 65 20 66 69 66 | 74 68 20 6d 65 74 68 6f | The fif|th metho|
|000009c0| 64 20 73 61 79 73 20 74 | 68 61 74 20 74 68 65 20 |d says t|hat the |
|000009d0| 61 64 64 69 74 69 6f 6e | 20 6f 66 20 61 20 73 69 |addition| of a si|
|000009e0| 6e 67 6c 65 0a 65 6c 65 | 6d 65 6e 74 20 69 73 20 |ngle.ele|ment is |
|000009f0| 74 68 69 73 20 65 6c 65 | 6d 65 6e 74 20 69 74 73 |this ele|ment its|
|00000a00| 65 6c 66 2e 20 54 68 65 | 20 73 69 78 74 68 20 6d |elf. The| sixth m|
|00000a10| 65 74 68 6f 64 20 73 61 | 79 73 20 74 68 61 74 20 |ethod sa|ys that |
|00000a20| 75 73 69 6e 67 20 74 68 | 65 20 61 64 64 69 74 69 |using th|e additi|
|00000a30| 6f 6e 20 77 69 74 68 0a | 6e 6f 20 70 61 72 61 6d |on with.|no param|
|00000a40| 65 74 65 72 20 61 6c 77 | 61 79 73 20 72 65 74 75 |eter alw|ays retu|
|00000a50| 72 6e 20 30 2e 20 54 68 | 65 20 6c 61 73 74 20 6d |rn 0. Th|e last m|
|00000a60| 65 74 68 6f 64 20 74 61 | 6b 65 73 20 61 6e 20 61 |ethod ta|kes an a|
|00000a70| 72 62 69 74 72 61 72 79 | 20 6e 75 6d 62 65 72 20 |rbitrary| number |
|00000a80| 6f 66 0a 70 61 72 61 6d | 65 74 65 72 73 3c 41 20 |of.param|eters<A |
|00000a90| 4e 41 4d 45 3d 22 74 65 | 78 32 68 74 6d 6c 36 22 |NAME="te|x2html6"|
|00000aa0| 20 48 52 45 46 3d 22 66 | 6f 6f 74 6e 6f 64 65 5f | HREF="f|ootnode_|
|00000ab0| 6d 6e 2e 68 74 6d 6c 23 | 66 6f 6f 74 33 30 34 22 |mn.html#|foot304"|
|00000ac0| 20 54 41 52 47 45 54 3d | 22 66 6f 6f 74 65 72 22 | TARGET=|"footer"|
|00000ad0| 3e 3c 53 55 50 3e 3c 49 | 4d 47 20 20 41 4c 54 3d |><SUP><I|MG ALT=|
|00000ae0| 22 5b 2a 5d 22 20 53 52 | 43 3d 22 66 6f 6f 74 6e |"[*]" SR|C="footn|
|00000af0| 6f 74 65 2e 70 6e 67 22 | 3e 3c 2f 53 55 50 3e 3c |ote.png"|></SUP><|
|00000b00| 2f 41 3e 2e 0a 54 68 69 | 73 20 6d 65 74 68 6f 64 |/A>..Thi|s method|
|00000b10| 20 61 63 74 73 20 61 73 | 20 61 20 6b 69 6e 64 20 | acts as| a kind |
|00000b20| 6f 66 20 3c 54 54 3e 72 | 65 64 75 63 65 3c 2f 54 |of <TT>r|educe</T|
|00000b30| 54 3e 3a 20 69 74 20 63 | 61 6c 6c 73 20 74 68 65 |T>: it c|alls the|
|00000b40| 20 64 79 61 64 69 63 20 | 61 64 64 69 74 69 6f 6e | dyadic |addition|
|00000b50| 20 6f 6e 0a 74 68 65 20 | 3c 45 4d 3e 63 61 72 3c | on.the |<EM>car<|
|00000b60| 2f 45 4d 3e 20 6f 66 20 | 74 68 65 20 6c 69 73 74 |/EM> of |the list|
|00000b70| 20 61 6e 64 20 6f 6e 20 | 74 68 65 20 72 65 73 75 | and on |the resu|
|00000b80| 6c 74 20 6f 66 20 61 70 | 70 6c 79 69 6e 67 20 69 |lt of ap|plying i|
|00000b90| 74 20 6f 6e 20 69 74 73 | 20 72 65 73 74 2e 20 20 |t on its| rest. |
|00000ba0| 54 6f 0a 66 69 6e 69 73 | 68 2c 20 74 68 65 20 3c |To.finis|h, the <|
|00000bb0| 54 54 3e 73 65 74 21 3c | 2f 54 54 3e 20 70 65 72 |TT>set!<|/TT> per|
|00000bc0| 6d 69 74 73 20 74 6f 20 | 72 65 64 65 66 69 6e 65 |mits to |redefine|
|00000bd0| 20 74 68 65 20 3c 54 54 | 3e 2b 20 73 79 6d 62 6f | the <TT|>+ symbo|
|00000be0| 6c 3c 2f 54 54 3e 20 74 | 6f 20 6f 75 72 20 65 78 |l</TT> t|o our ex|
|00000bf0| 74 65 6e 64 65 64 0a 61 | 64 64 69 74 69 6f 6e 2e |tended.a|ddition.|
|00000c00| 0a 0a 3c 50 3e 0a 0a 3c | 50 3e 3c 50 3e 0a 3c 42 |..<P>..<|P><P>.<B|
|00000c10| 52 3e 0a 54 6f 20 74 65 | 72 6d 69 6e 61 74 65 20 |R>.To te|rminate |
|00000c20| 6f 75 72 20 69 6d 70 6c | 65 6d 65 6e 74 61 74 69 |our impl|ementati|
|00000c30| 6f 6e 20 28 69 6e 74 65 | 67 72 61 74 69 6f 6e 3f |on (inte|gration?|
|00000c40| 29 20 6f 66 20 20 63 6f | 6d 70 6c 65 78 20 6e 75 |) of co|mplex nu|
|00000c50| 6d 62 65 72 73 2c 20 77 | 65 20 63 61 6e 20 0a 72 |mbers, w|e can .r|
|00000c60| 65 64 65 66 69 6e 65 20 | 73 74 61 6e 64 61 72 64 |edefine |standard|
|00000c70| 20 53 63 68 65 6d 65 20 | 70 72 65 64 69 63 61 74 | Scheme |predicat|
|00000c80| 65 73 20 69 6e 20 74 68 | 65 20 66 6f 6c 6c 6f 77 |es in th|e follow|
|00000c90| 69 6e 67 20 6d 61 6e 6e | 65 72 3a 0a 3c 42 52 3e |ing mann|er:.<BR>|
|00000ca0| 0a 3c 49 4d 47 0a 20 20 | 53 54 59 4c 45 3d 22 68 |.<IMG. |STYLE="h|
|00000cb0| 65 69 67 68 74 3a 20 31 | 39 36 2e 32 35 65 78 3b |eight: 1|96.25ex;|
|00000cc0| 20 76 65 72 74 69 63 61 | 6c 2d 61 6c 69 67 6e 3a | vertica|l-align:|
|00000cd0| 20 2d 30 2e 37 30 65 78 | 3b 20 22 20 53 52 43 3d | -0.70ex|; " SRC=|
|00000ce0| 22 69 6d 67 33 34 2e 70 | 6e 67 22 0a 20 41 4c 54 |"img34.p|ng". ALT|
|00000cf0| 3d 22 5c 62 65 67 69 6e | 7b 73 63 68 65 6d 65 7d |="\begin|{scheme}|
|00000d00| 0a 28 64 65 66 69 6e 65 | 2d 6d 65 74 68 6f 64 20 |.(define|-method |
|00000d10| 63 6f 6d 70 6c 65 78 3f | 20 28 63 20 26 6c 74 3b |complex?| (c &lt;|
|00000d20| 63 6f 6d 70 6c 65 78 26 | 67 74 3b 29 20 5c 73 63 |complex&|gt;) \sc|
|00000d30| 68 74 72 75 65 29 0a 28 | 64 65 66 69 6e 65 2d 6d |htrue).(|define-m|
|00000d40| 65 74 68 6f 64 20 63 6f | 2e 2e 2e 0a 2e 2e 2e 6e |ethod co|.......n|
|00000d50| 20 26 6c 74 3b 6e 75 6d | 62 65 72 26 67 74 3b 29 | &lt;num|ber&gt;)|
|00000d60| 20 5c 73 63 68 74 72 75 | 65 29 0a 28 64 65 66 69 | \schtru|e).(defi|
|00000d70| 6e 65 2d 6d 65 74 68 6f | 64 20 6e 75 6d 62 65 72 |ne-metho|d number|
|00000d80| 3f 20 28 6e 29 20 5c 73 | 63 68 66 61 6c 73 65 29 |? (n) \s|chfalse)|
|00000d90| 0a 2e 2e 2e 0a 2e 2e 2e | 0a 5c 65 6e 64 7b 73 63 |........|.\end{sc|
|00000da0| 68 65 6d 65 7d 22 3e 0a | 3c 42 52 3e 0a 0a 3c 50 |heme}">.|<BR>..<P|
|00000db0| 3e 0a 53 74 61 6e 64 61 | 72 64 20 70 72 69 6d 69 |>.Standa|rd primi|
|00000dc0| 74 69 76 65 73 20 69 6e | 20 77 68 69 63 68 20 63 |tives in| which c|
|00000dd0| 6f 6d 70 6c 65 78 20 6e | 75 6d 62 65 72 73 20 61 |omplex n|umbers a|
|00000de0| 72 65 20 69 6e 76 6f 6c | 76 65 64 20 63 6f 75 6c |re invol|ved coul|
|00000df0| 64 20 61 6c 73 6f 20 62 | 65 20 72 65 64 65 66 69 |d also b|e redefi|
|00000e00| 6e 65 64 0a 69 6e 20 74 | 68 65 20 73 61 6d 65 20 |ned.in t|he same |
|00000e10| 6d 61 6e 6e 65 72 2e 0a | 0a 3c 50 3e 0a 54 68 69 |manner..|.<P>.Thi|
|00000e20| 73 20 65 6e 64 73 20 74 | 68 69 73 20 62 72 69 65 |s ends t|his brie|
|00000e30| 66 20 70 72 65 73 65 6e | 74 61 74 69 6f 6e 20 6f |f presen|tation o|
|00000e40| 66 20 74 68 65 20 20 65 | 78 74 65 6e 73 69 6f 6e |f the e|xtension|
|00000e50| 2e 20 20 0a 0a 3c 48 52 | 3e 0a 0a 3c 2f 42 4f 44 |. ..<HR|>..</BOD|
|00000e60| 59 3e 0a 3c 2f 48 54 4d | 4c 3e 0a |Y>.</HTM|L>. |
+--------+-------------------------+-------------------------+--------+--------+